home *** CD-ROM | disk | FTP | other *** search
/ Die Ultimative Software-P…i Collection 1996 & 1997 / Die Ultimative Software-Pakete CD-ROM fur Atari Collection 1996 & 1997.iso / p / pov / povlisti.ngs / skyvase.pov < prev    next >
Encoding:
Text File  |  1992-07-02  |  2.8 KB  |  121 lines
  1. // Persistence Of Vision raytracer version 1.0 sample file.
  2.  
  3. // By Dan Farmer
  4. //    Minneapolis, mn
  5.  
  6. //   skyvase.pov
  7. //   Vase made with Hyperboloid and sphere {, sitting on a hexagonal
  8. //   marble column.  Take note of the color and surface characteristics
  9. //   of the gold band around the vase.  It seems to be a successful
  10. //   combination for gold or brass.
  11. //
  12. // Contains a Disk_Y object which may have changed in shapes.dat
  13.  
  14.  
  15. #include "shapes.inc"
  16. #include "shapes2.inc"
  17. #include "colors.inc"
  18. #include "textures.inc"
  19.  
  20. #declare DMF_Hyperboloid = quadric {  /* Like Hyperboloid_Y, but more curvy */
  21.    <1.0 -1.0  1.0>
  22.    <0.0  0.0  0.0>
  23.    <0.0  0.0  0.0>
  24.    -0.5
  25. }
  26.  
  27. camera {
  28.    location <0.0  28.0  -200.0>
  29.    direction <0.0 0.0  2.0>
  30.    up  <0.0  1.0  0.0>
  31.    right <1.33333 0.0 0.0>
  32.    look_at <0.0  -12.0 0.0>
  33. }
  34.  
  35. /* Light behind viewer postion (pseudo-ambient light) */
  36. object {  
  37.    light_source { <100.0  500.0  -500.0>
  38.       colour White
  39.    }
  40. }
  41.  
  42. composite {
  43.    object {
  44.  
  45.       union {
  46.          intersection {
  47.             plane { <0 1 0> 0.7 }
  48.             quadric { DMF_Hyperboloid scale <0.75 1.25 0.75> }
  49.             quadric { DMF_Hyperboloid scale <0.70 1.25 0.70> inverse }
  50.             plane { <0.0 1.0 0.0> -1.0 inverse }
  51.          }
  52.          quadric { Ellipsoid scale <1.6 0.75 1.6 > translate <0 -1.15 0> }
  53.       }
  54.  
  55.       scale <20 25 20>
  56.       texture {
  57.          Bright_Blue_Sky
  58.          turbulence 0.3
  59.          scale <8.0 4.0 4.0>
  60.          rotate <0 0 15>
  61.          ambient 0.1   diffuse 0.75
  62.          phong 1 phong_size 100
  63.          reflection 0.35
  64.       }
  65.       color Green
  66.    }
  67.  
  68.    object {  /* Gold ridge around sphere portion of vase*/
  69.       quadric { Ellipsoid 
  70.          scale <1.6 0.75 1.6 >
  71.          translate <0 -7.0 0>
  72.          scale <20.5 4.0  20.5 >
  73.       }
  74.       texture {
  75.          Metal
  76.          color OldGold
  77.       }
  78.       color OldGold
  79.    }
  80.  
  81.    bounded_by {
  82.       intersection {
  83.          Disk_Y
  84.          translate <0.0 -0.5 0.0> // Remove for new Disk_Y definition
  85.          scale <34 100 34>
  86.       }
  87.    }
  88.  
  89. }
  90.  
  91. object {  /* Stand for the vase */
  92.    intersection { Hexagon
  93.       rotate <0.0 0.0 -90.0>    /* Stand it on end (vertical)*/
  94.       rotate<0.0 -45.0 0.0>    /* Turn it to a pleasing angle */
  95.       scale<40 25 40>
  96.       translate<0 -70 0>
  97.    }
  98.    texture {
  99.       Sapphire_Agate
  100.       scale <10.0 10.0 10.0>
  101.       ambient 0.2
  102.       diffuse 0.75
  103.       reflection 0.85
  104.    }
  105.    color red 1.0          /*Color is only for debugging w/o texture*/
  106. }
  107.  
  108. object {
  109.    union {
  110.       plane { <0 0 1> 50  rotate <0 -45 0> }
  111.       plane { <0 0 1> 50  rotate <0 +45 0> }
  112.    }
  113.    texture {
  114.       color DimGray
  115.       ambient 0.2
  116.       diffuse 0.75
  117.       reflection 0.5
  118.    }
  119.    color Gray
  120. }
  121.